home *** CD-ROM | disk | FTP | other *** search
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was processed as: Delphi Borland Form
(archive/borlandDelphiForm).
You can browse this item here: TFORM4
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| Delphi Borland Form (archive/borlandDelphiForm)
| magic
| Supported |
100%
| file
| Delphi compiled form 'TForm4'
| default
| |
99%
| file
| data
| default
| |
100%
| TrID
| Borland Form (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 54 50 46 30 06 54 46 6f | 72 6d 34 05 46 6f 72 6d |TPF0.TFo|rm4.Form|
|00000010| 34 04 4c 65 66 74 03 c2 | 00 03 54 6f 70 03 a1 00 |4.Left..|..Top...|
|00000020| 0b 42 6f 72 64 65 72 49 | 63 6f 6e 73 0b 0c 62 69 |.BorderI|cons..bi|
|00000030| 53 79 73 74 65 6d 4d 65 | 6e 75 00 0b 42 6f 72 64 |SystemMe|nu..Bord|
|00000040| 65 72 53 74 79 6c 65 07 | 08 62 73 53 69 6e 67 6c |erStyle.|.bsSingl|
|00000050| 65 07 43 61 70 74 69 6f | 6e 06 0e 43 6f 64 65 20 |e.Captio|n..Code |
|00000060| 47 65 6e 65 72 61 74 6f | 72 0c 43 6c 69 65 6e 74 |Generato|r.Client|
|00000070| 48 65 69 67 68 74 03 0d | 01 0b 43 6c 69 65 6e 74 |Height..|..Client|
|00000080| 57 69 64 74 68 03 93 01 | 05 43 6f 6c 6f 72 07 09 |Width...|.Color..|
|00000090| 63 6c 42 74 6e 46 61 63 | 65 0c 46 6f 6e 74 2e 43 |clBtnFac|e.Font.C|
|000000a0| 68 61 72 73 65 74 07 0f | 44 45 46 41 55 4c 54 5f |harset..|DEFAULT_|
|000000b0| 43 48 41 52 53 45 54 0a | 46 6f 6e 74 2e 43 6f 6c |CHARSET.|Font.Col|
|000000c0| 6f 72 07 0c 63 6c 57 69 | 6e 64 6f 77 54 65 78 74 |or..clWi|ndowText|
|000000d0| 0b 46 6f 6e 74 2e 48 65 | 69 67 68 74 02 f5 09 46 |.Font.He|ight...F|
|000000e0| 6f 6e 74 2e 4e 61 6d 65 | 06 0d 4d 53 20 53 61 6e |ont.Name|..MS San|
|000000f0| 73 20 53 65 72 69 66 0a | 46 6f 6e 74 2e 53 74 79 |s Serif.|Font.Sty|
|00000100| 6c 65 0b 00 0e 4f 6c 64 | 43 72 65 61 74 65 4f 72 |le...Old|CreateOr|
|00000110| 64 65 72 08 0d 50 69 78 | 65 6c 73 50 65 72 49 6e |der..Pix|elsPerIn|
|00000120| 63 68 02 60 0a 54 65 78 | 74 48 65 69 67 68 74 02 |ch.`.Tex|tHeight.|
|00000130| 0d 00 05 54 4d 65 6d 6f | 05 4d 65 6d 6f 31 04 4c |...TMemo|.Memo1.L|
|00000140| 65 66 74 02 0c 03 54 6f | 70 02 0c 05 57 69 64 74 |eft...To|p...Widt|
|00000150| 68 03 79 01 06 48 65 69 | 67 68 74 03 e5 00 0d 4c |h.y..Hei|ght....L|
|00000160| 69 6e 65 73 2e 53 74 72 | 69 6e 67 73 01 06 17 50 |ines.Str|ings...P|
|00000170| 72 69 76 61 74 65 20 53 | 75 62 20 46 6f 72 6d 5f |rivate S|ub Form_|
|00000180| 4c 6f 61 64 28 29 06 16 | 20 44 69 6d 20 52 65 74 |Load()..| Dim Ret|
|00000190| 56 61 6c 20 41 73 20 49 | 6e 74 65 67 65 72 06 00 |Val As I|nteger..|
|000001a0| 06 3c 20 4c 6f 63 6b 49 | 74 31 2e 56 69 73 69 62 |.< LockI|t1.Visib|
|000001b0| 6c 65 20 3d 20 46 61 6c | 73 65 20 20 20 20 20 20 |le = Fal|se |
|000001c0| 20 20 20 20 20 20 20 20 | 20 27 53 65 74 20 4f 43 | | 'Set OC|
|000001d0| 58 20 74 6f 20 69 6e 76 | 69 73 69 62 6c 65 06 49 |X to inv|isible.I|
|000001e0| 20 4c 6f 63 6b 49 74 31 | 2e 53 65 74 50 61 74 68 | LockIt1|.SetPath|
|000001f0| 20 28 41 70 70 2e 50 61 | 74 68 29 20 20 20 20 20 | (App.Pa|th) |
|00000200| 20 20 27 4c 65 74 20 4f | 43 58 20 6b 6e 6f 77 20 | 'Let O|CX know |
|00000210| 77 68 65 72 65 20 4c 49 | 43 45 4e 53 45 2e 44 41 |where LI|CENSE.DA|
|00000220| 54 20 46 49 4c 45 20 69 | 73 06 43 20 52 65 74 56 |T FILE i|s.C RetV|
|00000230| 61 6c 20 3d 20 4c 6f 63 | 6b 49 74 31 2e 47 65 74 |al = Loc|kIt1.Get|
|00000240| 54 72 69 61 6c 53 74 61 | 74 75 73 20 27 43 68 65 |TrialSta|tus 'Che|
|00000250| 63 6b 20 74 6f 20 73 65 | 65 20 73 74 61 74 75 73 |ck to se|e status|
|00000260| 20 6f 66 20 70 72 6f 74 | 65 63 74 69 6f 6e 06 01 | of prot|ection..|
|00000270| 20 06 13 20 53 65 6c 65 | 63 74 20 43 61 73 65 20 | .. Sele|ct Case |
|00000280| 52 65 74 56 61 6c 06 09 | 20 20 43 61 73 65 20 2d |RetVal..| Case -|
|00000290| 31 06 12 20 20 20 27 20 | 53 74 69 6c 6c 20 72 75 |1.. ' |Still ru|
|000002a0| 6e 6e 69 6e 67 06 08 20 | 20 43 61 73 65 20 30 06 |nning.. | Case 0.|
|000002b0| 20 20 20 20 27 20 4c 49 | 43 45 4e 53 45 2e 44 41 | ' LI|CENSE.DA|
|000002c0| 54 20 66 69 6c 65 20 69 | 73 20 6d 69 73 73 69 6e |T file i|s missin|
|000002d0| 67 06 08 20 20 43 61 73 | 65 20 31 06 12 20 20 20 |g.. Cas|e 1.. |
|000002e0| 27 20 54 72 69 61 6c 20 | 45 78 70 69 72 65 64 06 |' Trial |Expired.|
|000002f0| 08 20 20 43 61 73 65 20 | 32 06 11 20 20 20 27 20 |. Case |2.. ' |
|00000300| 49 6c 6c 65 67 61 6c 20 | 43 6f 70 79 06 08 20 20 |Illegal |Copy.. |
|00000310| 43 61 73 65 20 33 06 17 | 20 20 20 27 20 4d 61 78 |Case 3..| ' Max|
|00000320| 69 6d 75 6d 20 74 69 6d | 65 73 20 75 73 65 64 06 |imum tim|es used.|
|00000330| 08 20 20 43 61 73 65 20 | 34 06 14 20 20 27 20 20 |. Case |4.. ' |
|00000340| 52 65 67 69 73 74 65 72 | 65 64 20 63 6f 70 79 06 |Register|ed copy.|
|00000350| 0b 20 45 6e 64 20 53 65 | 6c 65 63 74 06 01 20 06 |. End Se|lect.. .|
|00000360| 33 20 27 31 29 20 4f 6e | 52 75 6e 6e 69 6e 67 20 |3 '1) On|Running |
|00000370| 20 20 20 20 20 43 6f 70 | 79 20 70 72 6f 74 65 63 | Cop|y protec|
|00000380| 74 69 6f 6e 20 69 73 20 | 73 74 69 6c 6c 20 61 63 |tion is |still ac|
|00000390| 74 69 76 65 06 2e 20 27 | 32 29 20 4f 6e 52 65 67 |tive.. '|2) OnReg|
|000003a0| 69 73 74 65 72 65 64 20 | 20 20 54 68 65 20 70 72 |istered | The pr|
|000003b0| 6f 67 72 61 6d 20 77 61 | 73 20 72 65 67 69 73 74 |ogram wa|s regist|
|000003c0| 65 72 65 64 06 2f 20 27 | 33 29 20 4f 6e 4d 69 73 |ered./ '|3) OnMis|
|000003d0| 73 69 6e 67 20 20 20 20 | 20 20 4c 49 43 45 4e 53 |sing | LICENS|
|000003e0| 45 2e 44 41 54 20 66 69 | 6c 65 20 69 73 20 6d 69 |E.DAT fi|le is mi|
|000003f0| 73 73 69 6e 67 06 48 20 | 27 34 29 20 4f 6e 4d 61 |ssing.H |'4) OnMa|
|00000400| 78 74 69 6d 65 73 20 20 | 20 20 20 54 68 65 20 70 |xtimes | The p|
|00000410| 72 6f 67 72 61 6d 20 68 | 61 73 20 65 78 63 65 65 |rogram h|as excee|
|00000420| 64 65 64 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |ded the |number o|
|00000430| 66 20 74 69 6d 65 73 20 | 61 6c 6c 6f 77 65 64 06 |f times |allowed.|
|00000440| 43 20 27 35 29 20 4f 6e | 49 6c 6c 65 67 61 6c 20 |C '5) On|Illegal |
|00000450| 20 20 20 20 20 50 72 6f | 67 72 61 6d 20 77 61 73 | Pro|gram was|
|00000460| 20 69 6c 6c 65 67 61 6c | 6c 79 20 63 6f 70 69 65 | illegal|ly copie|
|00000470| 64 20 74 6f 20 61 6e 6f | 74 68 65 72 20 6d 61 63 |d to ano|ther mac|
|00000480| 68 69 6e 65 06 30 20 27 | 36 29 20 4f 6e 45 78 70 |hine.0 '|6) OnExp|
|00000490| 69 72 65 64 20 20 20 20 | 20 20 43 6f 70 79 20 70 |ired | Copy p|
|000004a0| 72 6f 74 65 63 74 69 6f | 6e 20 68 61 73 20 65 78 |rotectio|n has ex|
|000004b0| 70 69 72 65 64 2e 06 07 | 45 6e 64 20 53 75 62 06 |pired...|End Sub.|
|000004c0| 00 06 1f 50 72 69 76 61 | 74 65 20 53 75 62 20 4c |...Priva|te Sub L|
|000004d0| 6f 63 6b 49 74 31 5f 4f | 6e 45 78 70 69 72 65 64 |ockIt1_O|nExpired|
|000004e0| 28 29 06 17 27 20 54 72 | 69 61 6c 20 76 65 72 73 |()..' Tr|ial vers|
|000004f0| 69 6f 6e 20 65 78 70 69 | 72 65 64 06 03 45 6e 64 |ion expi|red..End|
|00000500| 06 07 45 6e 64 20 53 75 | 62 06 00 06 1f 50 72 69 |..End Su|b....Pri|
|00000510| 76 61 74 65 20 53 75 62 | 20 4c 6f 63 6b 49 74 31 |vate Sub| LockIt1|
|00000520| 5f 4f 6e 49 6c 6c 65 67 | 61 6c 28 29 06 19 27 20 |_OnIlleg|al()..' |
|00000530| 74 68 69 73 20 69 73 20 | 61 6e 20 69 6c 6c 65 67 |this is |an illeg|
|00000540| 61 6c 20 63 6f 70 79 06 | 03 45 6e 64 06 07 45 6e |al copy.|.End..En|
|00000550| 64 20 53 75 62 06 00 06 | 20 50 72 69 76 61 74 65 |d Sub...| Private|
|00000560| 20 53 75 62 20 4c 6f 63 | 6b 49 74 31 5f 4f 6e 4d | Sub Loc|kIt1_OnM|
|00000570| 61 78 74 69 6d 65 73 28 | 29 06 14 27 20 4d 61 78 |axtimes(|)..' Max|
|00000580| 20 74 69 6d 65 73 20 65 | 78 63 65 65 64 65 64 06 | times e|xceeded.|
|00000590| 03 45 6e 64 06 07 45 6e | 64 20 53 75 62 06 00 06 |.End..En|d Sub...|
|000005a0| 1f 50 72 69 76 61 74 65 | 20 53 75 62 20 4c 6f 63 |.Private| Sub Loc|
|000005b0| 6b 49 74 31 5f 4f 6e 4d | 69 73 73 69 6e 67 28 29 |kIt1_OnM|issing()|
|000005c0| 06 1a 20 27 20 4c 69 63 | 65 6e 73 65 20 66 69 6c |.. ' Lic|ense fil|
|000005d0| 65 20 69 73 20 6d 69 73 | 73 69 6e 67 06 04 20 45 |e is mis|sing.. E|
|000005e0| 6e 64 06 07 45 6e 64 20 | 53 75 62 06 00 06 22 50 |nd..End |Sub..."P|
|000005f0| 72 69 76 61 74 65 20 53 | 75 62 20 4c 6f 63 6b 49 |rivate S|ub LockI|
|00000600| 74 31 5f 4f 6e 52 65 67 | 69 73 74 65 72 65 64 28 |t1_OnReg|istered(|
|00000610| 29 06 1b 27 20 54 68 65 | 20 70 72 6f 67 72 61 6d |)..' The| program|
|00000620| 20 69 73 20 72 65 67 69 | 73 74 65 72 65 64 06 00 | is regi|stered..|
|00000630| 06 07 45 6e 64 20 53 75 | 62 06 00 06 1f 50 72 69 |..End Su|b....Pri|
|00000640| 76 61 74 65 20 53 75 62 | 20 4c 6f 63 6b 49 74 31 |vate Sub| LockIt1|
|00000650| 5f 4f 6e 52 75 6e 6e 69 | 6e 67 28 29 06 1d 27 20 |_OnRunni|ng()..' |
|00000660| 54 72 69 61 6c 20 70 72 | 6f 67 72 61 6d 20 73 74 |Trial pr|ogram st|
|00000670| 69 6c 6c 20 72 75 6e 6e | 69 6e 67 06 07 45 6e 64 |ill runn|ing..End|
|00000680| 20 53 75 62 00 08 54 61 | 62 4f 72 64 65 72 02 00 | Sub..Ta|bOrder..|
|00000690| 00 00 00 | |... | |
+--------+-------------------------+-------------------------+--------+--------+